home *** CD-ROM | disk | FTP | other *** search
/ Deutsche Edition 1 / Deutsche Edition 1.iso / amok / amok_lha / amok80.lha / IntuiPointer / IntuiPointer.dok next >
Text File  |  1993-08-15  |  2KB  |  61 lines
  1. *******************************************************************
  2. Dokumentation zum Modul IntuiPointer         Bernd Preusing 9.11.89
  3. *******************************************************************
  4.  
  5. Manchmal möchte man den Benutzer darauf hinweisen, daß das Programm
  6. gerade sehr beschäftigt ist und sich nicht um seine Eingaben kümmern
  7. kann. Dies macht z.B. die Workbench laufend mit seinem 'ZZ'-Maus-
  8. zeiger.
  9.  
  10. Und das geht nun sehr einfach mit Hilfe dieses Moduls. Dazu werden
  11. zwei simple Prozeduren exportiert, die jeweils den Mauszeiger eines
  12. Fensters verändern:
  13.  
  14.    PROCEDURE Busy(Win:Intuition.WindowPtr);
  15.    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  16.    PROCEDURE Normal(Win:Intuition.WindowPtr);
  17.    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  18.  
  19. Busy() setzt einen 'ZZ'-Mauszeiger ähnlich der Workbench an des Fenster,
  20. Normal() stellt den normalen Zeiger wieder her.
  21.  
  22. Bernd Preusing
  23.  
  24.  
  25. Änderungen Version1.1:
  26. ~~~~~~~~~~~~~~~~~~~~~~
  27. Das Image des (ZZ)-Sprites ist jetzt nicht nur ähnlich sondern identisch
  28. mit dem des Workbench-(ZZ)-Pointers. Es sieht jetzt etwas weniger schlecht
  29. aus als Version 1.0 (Bitte keine Gerüchte, ich hätte einen Sprite-
  30. Grabber... ich hab einfach ein Gewicht auf die rechte Maustaste gelegt und
  31. den Sprite ganz einfach abgemalt).
  32.  
  33. Bene
  34.  
  35. PS: Ich habe die höhe des Pointers von 16 auf 22 gestellt, ich glaube aber
  36. nicht, das sich das störend bemerkbar macht. Die Workbench machts ja auch.
  37.  
  38.  
  39. Änderungen Version1.2:
  40. ~~~~~~~~~~~~~~~~~~~~~~
  41. Das Image des Sprites ist jetzt identisch mit dem des Workbench 2.0
  42. Busy-Pointers (obwohl ich das alte ZZ-Wölkchen schöner fand).
  43. Außerdem ist das Modul nun in Oberon.
  44.  
  45. Christian Stiens, 22-Jan-92
  46.  
  47.  
  48. Änderungen Version1.3:
  49. ~~~~~~~~~~~~~~~~~~~~~~
  50. Es besteht nun die Möglichkeit, die Busy-Stopuhr zu animieren, wodurch
  51. der Anwender sehen kann, wie lang er noch warten muß.
  52.  
  53.    PROCEDURE AnimBusy (Win: Intuition.WindowPtr; num: INTEGER);
  54.    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  55.  
  56. Während der Wartephase ruft man in regelmäßen Abständen diese Routine
  57. auf, wobei man den Wert "num" von 0 bis 16 laufen lässt.
  58.  
  59. Christian Stiens, 06-Oct-92
  60.  
  61.